unit VoiceNumber;

interface

type
  TVoiceNumber = class
  private
    { Private Declarations }
    _number : Integer;
    _text : String;
  public
    property Number : Integer read _number write _number;
    property Text : String read _text write _text;
    
    constructor Create(n : Integer; t : String);
  end;

implementation

constructor TVoiceNumber.Create(n : Integer; t : String);
begin
  inherited Create;

  self.Number := n;
  self.Text := t;
end;

end.
